Top 10k strings from Robotank (19xx)(-).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   3 ;"PRESS ANY KEY TO CONTINUE":
   2 SPY=SPY+R(P1)+(1
   2 SPX=SPX+R(P2)+(1
   2 PY,PX;A$(PN
   2 *(K$="R"))+(-1
   2 *((R(P1)=0
   1 SPY,SPX;" ";
   1 SPY,SPX;" "
   1 SPY+R(P1),SPX;" ":
   1 SET UP UDGs
   1 SET UP SCREEN
   1 SET UP CHARACTER ARRAY FOR TANK
   1 SCORE=SCORE+(10
   1 ROBOTANK  
   1 PY=PY+R(P1):
   1 PY1,PX1;"  ";
   1 PY,PX;"|/";
   1 PY,PX;"\/";
   1 PX=PX+R(P2)
   1 PRINT SHELL
   1 PRINT NEW TANK IMAGE
   1 O$(NO)=P$:
   1 HSCORE=SCORE
   1 HSCORE<SCORE 
   1 DIMEMSION & SET ARRAYS
   1 DESTROY TARGET
   1 CHECK DIRECTION
   1 ;"YOUR SCORE";
   1 ;"SCORE= ";
   1 ;"ROBOTANK":
   1 ;"HIGH SCORE";
   1 ;"HI-SCORE= ";
   1 ;"ENTER LEVEL":
   1 ;"  DO YOU WANT TO TRY AGAIN Y/N":
   1 8TT<D<x(D8
   1 *G)*LEVEL:
   1 *(K$="L")): 
   1 *(K$="L"))
   1 *((R(P1)=1
   1 *((R(P1)=-1
   1 (SPY,SPX):
   1 "will be copied onto the top of  the screen."
   1 "which will be interpreted and":
   1 "then carried out."
   1 "series of up to 31
   1 "press the ENTER key after typingin each one. You can have a"
   1 "on its mission."
   1 "latest design in tanks, the":
   1 "by entering a series of commands":
   1 "You have eight attempts with    which to destroy all the targets"
   1 "You are the commander of the":
   1 "There are three levels of play  each increasing the number of   targets and their value."
   1 "The targets consist of anti-tanktraps, anti-tank guns, rocket   launchers, radar stations and   command posts."
   1 "The points value of each target you destroy increases with each attempt."
   1 "The game starts with a battle   field being drawn on which a    number of targets will be shown."
   1 "The 'ROBOTANK' will be displayedat the bottom of the screen. As you enter your commands they":
   1 "Only the following commands willbe acted upon."
   1 "Once you have entered thirty onecommands the tank will start off":
   1 "ORDER ? ";P$:
   1 "If the tank collides with any   object then the game will end."
   1 "Enter the level of play (1-3)?"
   1 "Each command is represented by  a single letter and you have to"
   1 "During play your current score  and the high score is displayed."
   1 "'ROBOTANK'. You control the tank"
   1 "   S....shoot"
   1 "   R....turn right"
   1 "   P....program complete-GO"
   1 "   L....turn left"
   1 "   F....forward  "
   1 "   D....delete last instruction"
   1  commands."
   1  SET TANK DIRECTION & MOVEMENT
   1  SET TANK DIRECTION
   1  SET INITIAL VARIABLES
   1  REQUEST INPUT
   1  INSTRUCTIONS
   1  ERASE OLD IMAGE OF TANK
   1  END GAME 
   1  DTT<DD8TD
   1  DESTROY TANK
   1  DECODE INSTRUCTIONS
   1  CHECK SHELL IS NOT OFF SCREEN
   1  CHECK FOR COLLISION
   1  CHECK FOR A HIT